;==============================================================================
;  setmemory: Clears XR bytes of memory at PGZERO_VECTOR_A adress with AC value

setmemory

		ldy #0
smem_loop
		sta (PGZERO_VECTOR_A),y
		iny
		dex
		bne smem_loop

		rts
		
;===============================================================================
;  copymemory: Copies XR bytes of memory from PGZERO_VECTOR_A to PGZERO_VECTOR_B 

copymemory

		ldy #0
cmem_loop
		lda (PGZERO_VECTOR_A),y
		sta (PGZERO_VECTOR_B),y
		iny
		dex
		bne cmem_loop

		rts
		
;=================================================